TempTable = GlobalObjManager["getNeighborIds"](GlobalObjManager)
TempN = table["getn"](TempTable)
myvar_0 = GetTemp(0)
myvar_1 = GetTemp(1)
myvar_2 = GetRunningObjectId()
myvar_3 = GetPersonData(myvar_2, PersonData["Person Age"])
myvar_4 = GetPersonData(myvar_2, PersonData["neighbor id"])
local myvar_9 = 1
for 1=1, TempN, myvar_9 do 
myvar_10 = Neighbor["new"](TempTable[1])
myvar_11 = GetNeighborRelationship(myvar_10["nid"], myvar_4, RelVars["Flags"])
	if (myvar_10["IsPet"](myvar_10) ~= 1) then 


		if (myvar_11 ~= 0) then 
myvar_11 = myvar_11

		myvar_12 = IsBitSet(myvar_11, RelFlags["StandardSet"])
			if (myvar_12 ~= 0) then 
myvar_12 = myvar_12

			
myvar_12 = myvar_10["GetObjectID"]
			myvar_12 = myvar_12(myvar_10)
				if (myvar_12 == 0) then
				
myvar_12 = myvar_10["GetNeighborData"]
				myvar_12 = myvar_12(myvar_10, "house number")
					if (0 < myvar_12) then
					
myvar_12 = myvar_10["GetNeighborData"]
					myvar_12 = myvar_12(myvar_10, "has Computer")
						if (myvar_12 ~= 1) then 
myvar_12 = myvar_12

					else
						
myvar_12 = myvar_10["IsTownie"]
						myvar_12 = myvar_12(myvar_10)
							if (myvar_12 ~= 1) then 
myvar_12 = myvar_12

							
myvar_12 = myvar_10["IsServiceNPC"]
							myvar_12 = myvar_12(myvar_10)
								if (myvar_12 ~= 1) then 
myvar_12 = myvar_12

								
myvar_12 = myvar_10["IsVacationSim"]
								myvar_12 = myvar_12(myvar_10)
									if (myvar_12 ~= 0) then 
myvar_12 = myvar_12

								else
								end
								
myvar_12 = myvar_10["GetNeighborData"]
								local myvar_14 = "person age"
								myvar_12 = myvar_12(myvar_10, myvar_14)
									if (2 < myvar_12) then
										if (myvar_12 == 3) then
											if (myvar_3 ~= 3) then
										else
												if (myvar_12 ~= 3) then
													if (myvar_3 ~= 3) then
												else
												end
												myvar_14 = myvar_10

													if (myvar_10["IsAlive"](myvar_14) ~= 0) then 


													myvar_14 = myvar_10

														if (myvar_10["IsScheduled"](myvar_14) ~= 1) then 


														myvar_14 = {}
														table["insert"](myvar_14, myvar_10["nid"])
													end
												end
											end
										end
									end
								end
							end
						end
					end
				end
			end
		end
	end
end
end
myvar_9 = myvar_1
myvar_10 = {}
SetObjectArray(myvar_0, myvar_9, myvar_10)
